/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_4 / issue_04 / scrnaccess / listing2

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 20 f4 20 3e | 6c 69 73 74 69 6e 67 32 |.... . >|listing2|
|00000010| 0d 00 14 1f 20 f4 20 53 | 70 72 69 74 65 20 63 6f |.... . S|prite co|
|00000020| 6e 76 65 72 74 65 72 20 | 70 72 6f 67 72 61 6d 0d |nverter |program.|
|00000030| 00 1e 05 20 0d 00 28 0e | 20 f2 61 73 73 65 6d 62 |... ..(.| .assemb|
|00000040| 6c 65 0d 00 32 11 20 de | 20 73 64 61 74 61 20 31 |le..2. .| sdata 1|
|00000050| 30 30 30 0d 00 3c 09 20 | eb 20 31 33 0d 00 46 18 |000..<. |. 13..F.|
|00000060| 20 ff 22 53 4c 4f 41 44 | 20 73 70 72 69 74 65 66 | ."SLOAD| spritef|
|00000070| 69 6c 65 22 0d 00 50 16 | 20 ff 22 53 43 48 4f 4f |ile"..P.| ."SCHOO|
|00000080| 53 45 20 73 70 72 69 74 | 65 22 0d 00 5a 32 20 ef |SE sprit|e"..Z2 .|
|00000090| 20 32 35 2c 32 33 37 2c | 35 39 35 3b 34 35 39 3b | 25,237,|595;459;|
|000000a0| 20 3a 20 f4 20 6c 6f 61 | 64 20 61 6e 64 20 64 69 | : . loa|d and di|
|000000b0| 73 70 6c 61 79 20 73 70 | 72 69 74 65 0d 00 64 40 |splay sp|rite..d@|
|000000c0| 20 41 25 3d 26 31 46 45 | 33 30 44 34 20 20 20 20 | A%=&1FE|30D4    |
|000000d0| 20 20 20 20 20 3a 20 f4 | 20 72 30 3d 73 63 72 65 |     : .| r0=scre|
|000000e0| 65 6e 20 61 64 72 65 73 | 73 20 6f 66 20 73 74 61 |en adres|s of sta|
|000000f0| 72 74 20 6f 66 20 73 70 | 72 69 74 65 0d 00 6e 32 |rt of sp|rite..n2|
|00000100| 20 43 25 3d 73 64 61 74 | 61 20 20 20 20 20 20 20 | C%=sdat|a       |
|00000110| 20 20 20 20 20 3a 20 f4 | 20 72 32 3d 64 61 74 61 |     : .| r2=data|
|00000120| 20 73 74 61 63 6b 20 70 | 6f 69 6e 74 65 72 0d 00 | stack p|ointer..|
|00000130| 78 0b 20 d6 20 63 6f 64 | 65 0d 00 82 3f 20 c8 99 |x. . cod|e...? ..|
|00000140| 20 22 4f 53 5f 46 69 6c | 65 22 2c 30 2c 22 73 64 | "OS_Fil|e",0,"sd|
|00000150| 61 74 61 22 2c 30 2c 30 | 2c 73 64 61 74 61 2c 73 |ata",0,0|,sdata,s|
|00000160| 64 61 74 61 2b 31 30 30 | 30 20 20 3a 20 f4 20 73 |data+100|0  : . s|
|00000170| 61 76 65 20 64 61 74 61 | 0d 00 8c 06 20 e0 0d 00 |ave data|.... ...|
|00000180| 96 05 20 0d 00 a0 05 20 | 0d 00 aa 10 20 dd 20 f2 |.. .... |.... . .|
|00000190| 61 73 73 65 6d 62 6c 65 | 0d 00 b4 0f 20 de 20 63 |assemble|.... . c|
|000001a0| 6f 64 65 20 35 31 32 0d | 00 be 15 20 e3 20 6c 6f |ode 512.|... . lo|
|000001b0| 6f 70 3d 30 20 b8 20 32 | 20 88 20 32 0d 00 c8 0c |op=0 . 2| . 2....|
|000001c0| 20 50 25 3d 63 6f 64 65 | 0d 00 d2 0f 20 5b 20 4f | P%=code|.... [ O|
|000001d0| 50 54 20 6c 6f 6f 70 0d | 00 dc 1f 20 3b 20 72 30 |PT loop.|... ; r0|
|000001e0| 3d 73 63 72 65 65 6e 20 | 61 64 72 65 73 73 20 70 |=screen |adress p|
|000001f0| 6f 69 6e 74 65 72 0d 00 | e6 0e 20 3b 20 72 31 3d |ointer..|.. ; r1=|
|00000200| 64 61 74 61 0d 00 f0 17 | 20 3b 20 72 32 3d 73 74 |data....| ; r2=st|
|00000210| 61 63 6b 20 70 6f 69 6e | 74 65 72 0d 00 fa 22 20 |ack poin|ter..." |
|00000220| 3b 20 72 33 3d 68 6f 72 | 69 7a 6f 6e 74 61 6c 20 |; r3=hor|izontal |
|00000230| 70 69 78 65 6c 20 63 6f | 75 6e 74 65 72 0d 01 04 |pixel co|unter...|
|00000240| 1f 20 3b 20 72 34 3d 76 | 65 72 74 69 63 61 6c 20 |. ; r4=v|ertical |
|00000250| 6c 69 6e 65 20 63 6f 75 | 6e 74 65 72 0d 01 0e 05 |line cou|nter....|
|00000260| 20 0d 01 18 34 20 4d 4f | 56 20 52 33 2c 23 30 20 | ...4 MO|V R3,#0 |
|00000270| 3a 20 4d 4f 56 20 52 34 | 2c 23 30 20 20 20 3b 20 |: MOV R4|,#0   ; |
|00000280| 69 6e 69 74 2e 20 63 6f | 75 6e 74 20 72 65 67 69 |init. co|unt regi|
|00000290| 73 74 61 72 73 0d 01 22 | 0a 20 2e 68 65 72 65 0d |stars.."|. .here.|
|000002a0| 01 2c 39 20 4c 44 52 42 | 20 52 31 2c 5b 52 30 5d |.,9 LDRB| R1,[R0]|
|000002b0| 2c 23 2b 31 20 20 20 20 | 20 20 20 20 3b 20 67 65 |,#+1    |    ; ge|
|000002c0| 74 20 70 69 78 65 6c 20 | 64 61 74 61 20 66 72 6f |t pixel |data fro|
|000002d0| 6d 20 73 63 72 65 65 6e | 0d 01 36 34 20 53 54 52 |m screen|..64 STR|
|000002e0| 42 20 52 31 2c 5b 52 32 | 5d 2c 23 2b 31 20 20 20 |B R1,[R2|],#+1   |
|000002f0| 20 20 20 20 20 3b 20 73 | 61 76 65 20 69 74 20 6f |     ; s|ave it o|
|00000300| 6e 20 64 61 74 61 20 73 | 74 61 63 6b 0d 01 40 2a |n data s|tack..@*|
|00000310| 20 41 44 44 20 52 33 2c | 52 33 2c 23 31 20 20 20 | ADD R3,|R3,#1   |
|00000320| 20 20 20 20 20 20 20 20 | 20 3b 20 69 6e 63 2e 20 |        | ; inc. |
|00000330| 63 6f 75 6e 74 31 0d 01 | 4a 0f 20 43 4d 50 20 52 |count1..|J. CMP R|
|00000340| 33 2c 23 32 34 0d 01 54 | 3b 20 42 43 43 20 68 65 |3,#24..T|; BCC he|
|00000350| 72 65 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |re      |        |
|00000360| 20 20 3b 20 67 6f 20 62 | 61 63 6b 20 69 66 20 6c |  ; go b|ack if l|
|00000370| 69 6e 65 20 6e 6f 74 20 | 66 69 6e 69 73 68 65 64 |ine not |finished|
|00000380| 0d 01 5e 3a 20 4d 4f 56 | 20 52 33 2c 23 30 20 20 |..^: MOV| R3,#0  |
|00000390| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 20 73 |        |     ; s|
|000003a0| 65 74 20 63 6f 75 6e 74 | 31 20 74 6f 20 73 74 61 |et count|1 to sta|
|000003b0| 72 74 20 6f 66 20 6c 69 | 6e 65 0d 01 68 2a 20 41 |rt of li|ne..h* A|
|000003c0| 44 44 20 52 34 2c 52 34 | 2c 23 31 20 20 20 20 20 |DD R4,R4|,#1     |
|000003d0| 20 20 20 20 20 20 20 3b | 20 69 6e 63 2e 20 63 6f |       ;| inc. co|
|000003e0| 75 6e 74 32 0d 01 72 40 | 20 53 55 42 20 52 30 2c |unt2..r@| SUB R0,|
|000003f0| 52 30 2c 23 33 34 34 20 | 20 20 20 20 20 20 20 20 |R0,#344 |        |
|00000400| 20 3b 20 70 6f 69 6e 74 | 20 72 30 20 74 6f 20 62 | ; point| r0 to b|
|00000410| 65 67 69 6e 6e 69 6e 67 | 20 6f 66 20 6e 65 77 20 |eginning| of new |
|00000420| 6c 69 6e 65 0d 01 7c 0f | 20 43 4d 50 20 52 34 2c |line..|.| CMP R4,|
|00000430| 23 32 34 0d 01 86 41 20 | 42 43 43 20 68 65 72 65 |#24...A |BCC here|
|00000440| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000450| 3b 20 67 6f 20 62 61 63 | 6b 20 69 66 20 61 6c 6c |; go bac|k if all|
|00000460| 20 6c 69 6e 65 73 20 6e | 6f 74 20 63 6f 6d 70 6c | lines n|ot compl|
|00000470| 65 74 65 64 0d 01 90 2e | 20 4d 4f 56 20 52 31 35 |eted....| MOV R15|
|00000480| 2c 52 31 34 20 20 20 20 | 20 20 20 20 20 20 20 20 |,R14    |        |
|00000490| 20 3b 20 72 65 74 75 72 | 6e 20 74 6f 20 62 61 73 | ; retur|n to bas|
|000004a0| 69 63 0d 01 9a 05 20 0d | 01 a4 4e 20 3b 20 74 6f |ic.... .|..N ; to|
|000004b0| 20 63 72 65 61 74 65 20 | 73 70 72 69 74 65 73 20 | create |sprites |
|000004c0| 6f 66 20 64 69 66 66 65 | 72 65 6e 74 20 73 69 7a |of diffe|rent siz|
|000004d0| 65 20 74 6f 20 32 34 78 | 32 34 20 73 69 6d 70 6c |e to 24x|24 simpl|
|000004e0| 79 20 61 6c 74 65 72 20 | 74 68 65 20 69 6d 6d 65 |y alter |the imme|
|000004f0| 64 69 61 74 65 0d 01 ae | 4d 20 3b 20 63 6f 6e 73 |diate...|M ; cons|
|00000500| 74 61 6e 74 73 20 75 73 | 65 64 20 69 6e 20 74 68 |tants us|ed in th|
|00000510| 65 20 43 4d 50 20 69 6e | 73 74 72 75 63 74 69 6f |e CMP in|structio|
|00000520| 6e 73 20 61 6e 64 20 63 | 68 61 6e 67 65 20 74 68 |ns and c|hange th|
|00000530| 65 20 23 33 34 34 20 69 | 6e 20 6c 69 6e 65 20 33 |e #344 i|n line 3|
|00000540| 37 30 0d 01 b8 39 20 3b | 20 74 6f 20 23 28 33 32 |70...9 ;| to #(32|
|00000550| 30 20 2b 20 74 68 65 20 | 6e 65 77 20 69 6d 6d 65 |0 + the |new imme|
|00000560| 64 69 61 74 65 20 63 6f | 6e 73 74 61 6e 74 20 69 |diate co|nstant i|
|00000570| 6e 20 6c 69 6e 65 20 33 | 33 30 29 0d 01 c2 06 20 |n line 3|30).... |
|00000580| 5d 0d 01 cc 06 20 ed 0d | 01 d6 06 20 e1 0d 01 e0 |].... ..|... ....|
|00000590| 05 20 0d ff             |                         |. ..    |        |
+--------+-------------------------+-------------------------+--------+--------+